home *** CD-ROM | disk | FTP | other *** search
/ SuperHack / SuperHack CD.bin / SCRIPTZ / ACIDV2.EXE / acid-evt.ini < prev    next >
INI File  |  1997-03-15  |  19KB  |  399 lines

  1. [Events]
  2. n0=#<=ACiD=> Remote Events Manager v2.0
  3. n1=#
  4. n2=#colorkick disabled
  5. n3=1:on text:**:#: {
  6. n4=  if $chan isin %kick.revenge.exempt { /echo -a 14<=ACiD=> 14-12:4[7 $+ Color Kicker $+ 4]12:14- 12Channel4 $chan 12is exempt from Color Kicks | /halt }
  7. n5=  kick $chan $nick <=ACiD=> Chill with colors!
  8. n6=}
  9. n7=1:on action:**:#: {
  10. n8=  if $chan isin %kick.revenge.exempt { /echo -a 14<=ACiD=> 14-12:4[7 $+ Color Kicker $+ 4]12:14- 12Channel4 $chan 12is exempt from Color Kicks | /halt }
  11. n9=  kick $chan $nick <=ACiD=> Chill with colors!
  12. n10=}
  13. n11=#colorkick end
  14. n12=1:on text:â[ACiD]â*:*:/set %dec.nick $nick | /aciddecrypt $parms
  15. n13=1:on text:¼ *:*:/set %denick $nick | /set %dechan $chan | /set %decrypt $parm2* | /decrypt
  16. n14=+10:on join:#:/mode $chan +o $nick | /echo $active 14<=ACiD=>4 -=Auto-Op=-12 Auto-Opping $nick on $chan
  17. n15=+9:on join:#:/ban $chan $nick 3 | /kick $chan $nick <=ACiD=> You Are Shitlisted! | /echo $active 14[<=ACiD=>]4 -=Shitlist=-12 Kick/Banning $nick on $chan
  18. n16=+8:on text:*:#:/kick $chan $nick <=ACiD=> âShut-up Kickâ I thought I told you to shutup!
  19. n17=+8:on action:*:#:/kick $chan $nick <=ACiD=> âShut-up Kickâ I thought I told you to shutup!
  20. n18=+8:on text:*:?:/kick $chan $nick <=ACiD=> âShut-up Kickâ I thought I told you to shutup, and don't /msg me!
  21. n19=+8:on notice:*:#:/kick $chan $nick <=ACiD=> âShut-up Kickâ I thought I told you to shutup, that means /notices too!
  22. n20=#relay disabled
  23. n21=1:on dns: {
  24. n22=  if $iaddress == $null { /echo <=ACiDLiNK=> 14-12:4[7 $+ ACiDLiNK $+ 4]12:14- 12Unable to resolve4 %linkaddy 1-- 12Stopping Link Attempt. | /disable #relay | /creq ask | /halt }
  25. n23=  set %linkip $iaddress
  26. n24=  acidlink2
  27. n25=}
  28. n26=1:on chatopen: {
  29. n27=  if $nick != $me { /halt }
  30. n28=  echo -a 14[<=ACiDLiNK=>] 14-12:4[7 $+ ACiDLiNK $+ 4]12:14- 12Connecting to Link Server....
  31. n29=  timer3000 1 5 { /msg = $+ $nick user acid2 acid2 acid2 acid2 : acid2 | /echo -a 14[<=ACiDLiNK=>] 14-12:4[7 $+ ACiDLiNK $+ 4]12:14- 12Logging in to server... }
  32. n30=  timer3001 1 6 { /msg = $+ $nick nick %linknick | /echo -a 14[<=ACiDLiNK=>] 14-12:4[7 $+ ACiDLiNK $+ 4]12:14- 12Changing Link Nickname... }
  33. n31=  timer3002 0 30 { /msg = $+ $me PRIVMSG %linknick :PING? PONG! }
  34. n32=  creq ask
  35. n33=}
  36. n34=1:on chatclose:/timer3002 off | /close -c | /creq ask | /disable #relay
  37. n35=1:on chat:*: {
  38. n36=  if $nick != $me { /halt }
  39. n37=  if $parm1 == PING {
  40. n38=    msg = $+ $nick PONG $parm2
  41. n39=  }
  42. n40=  if $parm2 == 376 { 
  43. n41=    msg = $+ $nick JOIN %linkchan.r
  44. n42=    echo -a 14<=ACiDLiNK=> 14-12:4[7 $+ ACiDLiNK $+ 4]12:14- 12Joining Link Channel:4 %linkchan.r
  45. n43=    echo -a 14<=ACiDLiNK=> 14-12:4[7 $+ ACiDLiNK $+ 4]12:14- 12Link is Connected - To Broadcast over the link, type4 /sl <text>12 or4 /ml <action>12.
  46. n44=    echo -a 14<=ACiDLiNK=> 14-12:4[7 $+ ACiDLiNK $+ 4]12:14- 12To Close the link type4 /closelink
  47. n45=    echo -a 14<=ACiDLiNK=> 14-12:4[7 $+ ACiDLiNK $+ 4]12:14- 12For a list of all link commands, type 4/acidhelp link
  48. n46=    msg %linkchan.l <=ACiDLiNK=> Link with %linkservername $+ 's %linkchan.r Established.
  49. n47=    msg = $+ $me PRIVMSG %linkchan.r $+ : <=ACiDLiNK=> Link with $server $+ 's %linkchan.l Established.
  50. n48=  }
  51. n49=  if $parm2 == 433 {
  52. n50=    echo -a 14[<=ACiDLiNK=>] 14-12:4[7 $+ ACiDLiNK $+ 4]12:14- 12The Nick that you have picked,4 %linknick 12,is in use.
  53. n51=    echo -a 14[<=ACiDLiNK=>] 14-12:4[7 $+ ACiDLiNK $+ 4]12:14- 12Type 4/linknick12 to choose another Link Nick.
  54. n52=  }
  55. n53=  if $parm1 == ERROR {
  56. n54=    echo -a 14[<=ACiDLiNK=>] 14-12:4[7 $+ ACiDLiNK $+ 4]12:14- 4 $parm2*
  57. n55=    echo -a 14[<=ACiDLiNK=>] 14-12:4[7 $+ ACiDLiNK $+ 4]12:14- 4Closing Link Attempt...
  58. n56=  }
  59. n57=  if $parm2 == 001 {
  60. n58=    set %linkservername $remove($parm1,:)
  61. n59=  }
  62. n60=  if $parm4 == :ACTION {
  63. n61=    set %i $pos($parm1,!)
  64. n62=    %i = %i - 1
  65. n63=    set %nick $left(%i,$parm1)
  66. n64=    set %nick $remove(%nick,:)
  67. n65=    set %text $remove($parm5,:) $parm6*
  68. n66=    describe %linkchan.l ( $+ %linkservername $+ / $+ %linkchan.r $+ ) * %nick %text
  69. n67=    halt
  70. n68=  }
  71. n69=  if $parm2 == PRIVMSG {
  72. n70=    set %i $pos($parm1,!)
  73. n71=    %i = %i - 1
  74. n72=    set %nick $left(%i,$parm1)
  75. n73=    set %nick $remove(%nick,:)
  76. n74=    set %text $len($parm4)  
  77. n75=    %text = %text - 1
  78. n76=    set %text $right(%text,$parm4) $parm5*
  79. n77=    if %nick == %linknick { /halt } 
  80. n78=    msg %linkchan.l ( $+ %linkservername $+ / $+ %linkchan.r $+ ) < $+ %nick $+ > %text
  81. n79=    halt
  82. n80=  }
  83. n81=  if $parm2 == PART {
  84. n82=    set %i $pos($parm1,!)
  85. n83=    %i = %i - 1
  86. n84=    set %nick $left(%i,$parm1)
  87. n85=    set %nick $remove(%nick,:)
  88. n86=    set %partaddy $parm1
  89. n87=    set %partaddy $remove(%partaddy,:)
  90. n88=    set %tmp %nick $+ !
  91. n89=    set %partaddy $remove(%partaddy,%tmp)
  92. n90=    msg %linkchan.l ( $+ %linkservername $+ / $+ %linkchan.r $+ )3 âPARTâ %nick ( $+ %partaddy $+ ) has left $parm3
  93. n91=    halt
  94. n92=  }
  95. n93=  if $parm2 == JOIN {
  96. n94=    set %i $pos($parm1,!)
  97. n95=    %i = %i - 1
  98. n96=    set %nick $left(%i,$parm1)
  99. n97=    set %nick $remove(%nick,:)
  100. n98=    set %joinaddy $parm1
  101. n99=    set %joinaddy $remove(%joinaddy,:)
  102. n100=    set %tmp %nick $+ !
  103. n101=    set %joinaddy $remove(%joinaddy,%tmp)
  104. n102=    set %joinchan $remove($parm3,:)
  105. n103=    msg %linkchan.l ( $+ %linkservername $+ / $+ %linkchan.r $+ )3 âJOINâ %nick ( $+ %joinaddy $+ ) has joined %joinchan
  106. n104=    halt
  107. n105=  }
  108. n106=  if $parm2 == QUIT {
  109. n107=    set %i $pos($parm1,!)
  110. n108=    %i = %i - 1
  111. n109=    set %nick $left(%i,$parm1)
  112. n110=    set %nick $remove(%nick,:)
  113. n111=    set %reason $remove($parm3,:) $parm4*
  114. n112=    msg %linkchan.l ( $+ %linkservername $+ / $+ %linkchan.r $+ ) -=-2 âQUITâ %nick has quit IRC ( $+ %reason $+ )
  115. n113=    halt
  116. n114=  }
  117. n115=  if $parm2 == MODE {
  118. n116=    set %i $pos($parm1,!)
  119. n117=    %i = %i - 1
  120. n118=    set %nick $left(%i,$parm1)
  121. n119=    set %nick $remove(%nick,:)
  122. n120=    set %mode $parm4*
  123. n121=    msg %linkchan.l ( $+ %linkservername $+ / $+ %linkchan.r $+ )3 âMODEâ %nick sets mode: %mode
  124. n122=    halt
  125. n123=  }
  126. n124=  if $parm2  == KICK  {
  127. n125=    set %i $pos($parm1,!)
  128. n126=    %i = %i - 1
  129. n127=    set %nick $left(%i,$parm1)
  130. n128=    set %nick $remove(%nick,:)
  131. n129=    set %reason $parm5*
  132. n130=    set %reason $remove(%reason,:)
  133. n131=    msg %linkchan.l ( $+ %linkservername $+ / $+ %linkchan.r $+ )3 âKICKâ $parm4 was kicked by %nick ( $+ %reason $+ )
  134. n132=    if $parm4 == %linknick { msg = $+ $me JOIN %linkchan.r }
  135. n133=    halt
  136. n134=  }
  137. n135=  if $parm2 == TOPIC {
  138. n136=    set %i $pos($parm1,!)
  139. n137=    %i = %i - 1
  140. n138=    set %nick $left(%i,$parm1)
  141. n139=    set %nick $remove(%nick,:)
  142. n140=    set %topic $parm4*
  143. n141=    set %topic $remove(%topic,:)
  144. n142=    msg %linkchan.l ( $+ %linkservername $+ / $+ %linkchan.r $+ )2 âTOPICâ %nick changes topic to: " $+ %topic $+ "
  145. n143=    halt
  146. n144=  }
  147. n145=  if $parm2 == NICK {
  148. n146=    set %i $pos($parm1,!)
  149. n147=    %i = %i - 1
  150. n148=    set %nick $left(%i,$parm1)
  151. n149=    set %nick $remove(%nick,:)
  152. n150=    set %newnick $parm3*
  153. n151=    set %newnick $remove(%newnick,:)
  154. n152=    msg %linkchan.l ( $+ %linkservername $+ / $+ %linkchan.r $+ )3 âNICKâ %nick is now known as %newnick
  155. n153=    halt
  156. n154=  }
  157. n155=}
  158. n156=1:on text:*:#: {
  159. n157=  if $chan != %linkchan.l { /halt }
  160. n158=  msg = $+ $me PRIVMSG %linkchan.r :( $+ $server $+ / $+ %linkchan.l $+ )  < $+ $nick $+ > $parm1*
  161. n159=}
  162. n160=1:on action:*:#: {
  163. n161=  if $chan != %linkchan.l { /halt }
  164. n162=  msg = $+ $me PRIVMSG %linkchan.r :ACTION ( $+ $server $+ / $+ %linkchan.l $+ ) * $nick $parm1* $+ 
  165. n163=}
  166. n164=1:on part:#: {
  167. n165=  if $chan != %linkchan.l { /halt }
  168. n166=  set %partaddy $address($nick,1)
  169. n167=  set %partaddy $remove(%partaddy,*!*)
  170. n168=  msg = $+ $me PRIVMSG %linkchan.r :( $+ $server $+ / $+ %linkchan.l $+ )3 âPARTâ $nick ( $+ %partaddy $+ ) has left $chan
  171. n169=}
  172. n170=1:on join:#: {
  173. n171=  if $chan != %linkchan.l { /halt }
  174. n172=  set %joinaddy $address($nick,1)
  175. n173=  set %joinaddy $remove(%joinaddy,*!*)
  176. n174=  msg = $+ $me PRIVMSG %linkchan.r :( $+ $server $+ / $+ %linkchan.l $+ )3 âJOINâ $nick ( $+ %joinaddy $+ ) has joined $chan
  177. n175=}
  178. n176=1:on quit:/msg = $+ $me PRIVMSG %linkchan.r :( $+ $server $+ / $+ %linkchan.l $+ )2 âQUITâ $nick has quit IRC ( $+ $parms $+ )
  179. n177=1:on mode:#: {
  180. n178=  if $chan != %linkchan { /halt }
  181. n179=  msg = $+ $me PRIVMSG %linkchan.r :( $+ $server $+ / $+ %linkchan.l $+ )3 âMODEâ $nick sets mode: $parms
  182. n180=}
  183. n181=1:on kick:#: {
  184. n182=  if $chan != %linkchan.l { /halt }
  185. n183=  msg = $+ $me PRIVMSG %linkchan.r :( $+ $server $+ / $+ %linkchan.l $+ )3 âKICKâ $knick was kicked by $nick ( $+ $parms $+ )
  186. n184=}
  187. n185=1:on topic:#: {
  188. n186=  if $chan != %linkchan.l { /halt }
  189. n187=  msg = $+ $me PRIVMSG %linkchan.r :( $+ $server $+ / $+ %linkchan.l $+ )2 âTOPICâ $nick changes topic to: " $+ $parms $+ "
  190. n188=}
  191. n189=1:on nick: {
  192. n190=  msg = $+ $me PRIVMSG %linkchan.r :( $+ $server $+ / $+ %linkchan.l $+ )3 âNICKâ $nick is now known as $newnick
  193. n191=}
  194. n192=1:on ban:#: {
  195. n193=  if $chan != %linkchan.l { /halt }
  196. n194=  msg = $+ $me PRIVMSG %linkchan.r :( $+ $server $+ / $+ %linkchan.l $+ )3 âBANâ $nick banned $banmask from $chan
  197. n195=}
  198. n196=1:on unban:#: {
  199. n197=  if $chan != %linkchan.l { /halt }
  200. n198=  msg = $+ $me PRIVMSG %linkchan.r :( $+ $server $+ / $+ %linkchan.l $+ )3 âUNBANâ $nick un-banned $banmask from $chan
  201. n199=}
  202. n200=1:on voice:#: {
  203. n201=  if $chan != %linkchan.l { /halt }
  204. n202=  msg = $+ $me PRIVMSG %linkchan.r :( $+ $server $+ / $+ %linkchan.l $+ )3 âMODEâ $nick sets mode +v $vnick
  205. n203=}
  206. n204=1:on devoice:#: {
  207. n205=  if $chan != %linkchan.l { /halt }
  208. n206=  msg = $+ $me PRIVMSG %linkchan.r :( $+ $server $+ / $+ %linkchan.l $+ )3 âMODEâ $nick sets mode +v $vnick
  209. n207=}
  210. n208=1:on op:#: {
  211. n209=  if $chan != %linkchan.l { /halt }
  212. n210=  msg = $+ $me PRIVMSG %linkchan.r :( $+ $server $+ / $+ %linkchan.l $+ )3 âMODEâ $nick sets mode: +o $opnick
  213. n211=}
  214. n212=1:on serverop:#: {
  215. n213=  if $chan != %linkchan.l { /halt }
  216. n214=  msg = $+ $me PRIVMSG %linkchan.r :( $+ $server $+ / $+ %linkchan.l $+ )3 âMODEâ $nick sets mode: +o $opnick
  217. n215=}
  218. n216=1:on deop:#: {
  219. n217=  if $chan != %linkchan.l { /halt }
  220. n218=  msg = $+ $me PRIVMSG %linkchan.r :( $+ $server $+ / $+ %linkchan.l $+ )3 âMODEâ $nick sets mode: -o $opnick
  221. n219=}
  222. n220=#relay end
  223. n221=#snotice disabled
  224. n222=1:on snotice:*:!
  225. n223=#snotice end
  226. n224=1:on dns: {
  227. n225=  echo -s 14<=ACID=>6 IP Address --> $iaddress 
  228. n226=  echo -s 14<=ACID=>6 Named Address --> $naddress 
  229. n227=  echo -s 14<=ACID=>6 Resolved Address --> $raddress
  230. n228=  halt
  231. n229=}
  232. n230=#repeater disabled
  233. n231=1:on text:*:#: {
  234. n232=  if $nick == %repeater.nick goto repeat
  235. n233=  goto done
  236. n234=  :repeat
  237. n235=  msg $chan $parms
  238. n236=  goto done
  239. n237=  :done
  240. n238=}
  241. n239=1:on action:*:#: {
  242. n240=  if $nick == %repeater.nick goto repeat
  243. n241=  goto done
  244. n242=  :repeat
  245. n243=  describe $chan $parms
  246. n244=  goto done
  247. n245=  :done
  248. n246=}
  249. n247=#repeater end
  250. n248=1:on quit:/echo -s 14<=ACiD=>12 Quits: $nick < $+ $parms $+ > - $fulldate | /halt
  251. n249=1:on snotice:*client connecting*: {
  252. n250=  set %tmp1 )
  253. n251=  set %tmp2 (
  254. n252=  set %tmp3 $remove($parm7,%tmp1) 
  255. n253=  set %tmp $remove(%tmp3,%tmp2)
  256. n254=  echo -s 14<=ACiD=> 12[10Client Connect12] 1Nickname:6 $parm6 15--14==15-- 1User@Host:3 %tmp
  257. n255=  wavplay c:\acid\sounds\discon.wav
  258. n256=  unset %tmp*
  259. n257=  halt
  260. n258=}
  261. n259=1:on snotice:*client exiting*: {
  262. n260=  set %tmp1 )
  263. n261=  set %tmp2 (
  264. n262=  set %tmp3 $remove($parm7,%tmp1) 
  265. n263=  set %tmp $remove(%tmp3,%tmp2)
  266. n264=  set %tmpres $parm8*
  267. n265=  set %tmp4 [Quit
  268. n266=  set %tmp5 ]
  269. n267=  set %tmp6 $remove(%tmpres,%tmp4) 
  270. n268=  set %tmp7 $remove(%tmp6,%tmp5)
  271. n269=  set %tmp8 $remove(%tmp7,%tmp1)
  272. n270=  set %tmpr $remove(%tmp8,%tmp2)
  273. n271=  echo -s 14<=ACiD=> 12[10Client Disconnect12] 1NickName:6 $parm6 15--14==15-- 1User@Host:3 %tmp 15--14==15-- 1Reason:12 %tmpr
  274. n272=  wavplay c:\acid\sounds\discon.wav
  275. n273=  unset %tmp*
  276. n274=  halt
  277. n275=}
  278. n276=#clients disabled
  279. n277=1:on snotice:*client connecting*:!
  280. n278=1:on snotice:*client exiting*:!
  281. n279=#clients end
  282. n280=1:on snotice:*net break*:/echo -s 14<=ACiD=> 12[10Net Split12] 4 $parm7 3Split From4 $parm6 3 $+ $parm8* | /wavplay c:\acid\sounds\discon.wav | /halt
  283. n281=1:on snotice:*net junction*:/echo -s 14<=ACiD=> 12[10Net Join12] 4 $parm7 3Connected To4 $parm6 | /wavplay c:\acid\sounds\discon.wav | /halt
  284. n282=1:on snotice:*rehashing Server*:/echo -s 14<=ACiD=> 12[10Server Rehash12] 6 $parm4 1is 12rehashing4 $server | /wavplay c:\acid\sounds\discon.wav | /halt
  285. n283=1:on snotice:*highest connection*:/echo -s 14<=ACiD=> 12[10Connection Count12] 3Highest Connection Count for4 $server $+ 1:12 $parm4* | /wavplay c:\acid\sounds\discon.wav | /halt
  286. n284=1:on snotice:*is now operator*:/echo -s 14<=ACiD=> 12[10IRC Operator12] 6 $parm4 3 $+ $parm5 1Class:12 $parm9 | /wavplay c:\acid\sounds\discon.wav | /halt
  287. n285=1:on snotice:*:/echo -s 14<=ACiD=> 12[10Server12] 14 $parm1* | /wavplay c:\acid\sounds\discon.wav | /halt
  288. n286=1:on action:*slap*trout*:#:/kick $chan $nick <=ACiD=> Trout Slaps Are Lame
  289. n287=#awaylog disabled
  290. n288=1:on text:*:?: {
  291. n289=  notice $nick <=ACiD=> I am away: ( $+ %away $+ )
  292. n290=  notice $nick <=ACiD=> Your message has been logged on $adate at $time - You are now on ignore for 30 seconds.
  293. n291=  write c:\acid\away.log  echo -a 14<=ACiD=> 14-12:4[7 $+ Message Log $+ 4]12:14-12 <4 $+ $nick $+ 12> [4Date1:5 $adate $+ 12] [4Time1:5 $time $+ 12]1 -->1 $parms
  294. n292=  echo -a 14<=ACiD=> 14-12:4[7 $+ Away Message Log ON $+ 4]12:14- 12<4 $+ $nick $+ 12>7 $parms
  295. n293=  ignore -u30p $nick 3
  296. n294=  timer99 1 1 /close -m
  297. n295=}
  298. n296=#awaylog end
  299. n297=#away disabled
  300. n298=1:on text:*:?: {
  301. n299=  notice $nick <=ACiD=> I am away: ( $+ %away $+ )
  302. n300=  notice $nick <=ACiD=> You are now on ignore for 30 seconds.
  303. n301=  ignore -u30p $nick 3
  304. n302=  timer99 1 1 /close -m
  305. n303=}
  306. n304=#away end
  307. n305=#nethack disabled
  308. n306=1:ON SERVEROP:#:/mode $chan -o $opnick
  309. n307=#nethack end
  310. n308=1:ON CTCPREPLY:PING*:{
  311. n309=  %pt = $ctime - $parm2 
  312. n310=  if (%pt == 1) { raw -q NOTICE $nick : PONG %pt second  }
  313. n311=  else { raw -q NOTICE $nick : PONG %pt seconds  }
  314. n312=}
  315. n313=1:on text:*âââââââ*:#:/kick $chan $nick <=ACiD=> Weeee, that was fun, let's do it again
  316. n314=1:on notice:*âââââââ*:#:/kick $chan $nick <=ACiD=> Weeee, that was fun, let's do it again
  317. n315=1:on wallops:*:/echo 6 -s 14<=ACiD=>1 [02WaLLoP1]4:6 <6 $+ $nick $+ 6> $parms | /halt 
  318. n316=1:on notice:*:*:/wavplay c:\acid\sounds\discon.wav
  319. n317=+10:on join:#:/mode $chan +o $nick | /echo $active 14<=ACiD=>4 -=Auto-Op=-12 Auto-Opping $nick on $chan
  320. n318=+9:on join:#:/ban $chan $nick 3 | /kick $chan $nick <=ACiD=> You Are Shitlisted! | /echo $active 14[<=ACiD=>]4 -=Shitlist=-12 Kick/Banning $nick on $chan
  321. n319=+8:on text:*:#:/kick $chan $nick <=ACiD=> âShut-up Kickâ I thought I told you to shutup!
  322. n320=+8:on action:*:#:/kick $chan $nick <=ACiD=> âShut-up Kickâ I thought I told you to shutup!
  323. n321=+8:on text:*:?:/kick $chan $nick <=ACiD=> âShut-up Kickâ I thought I told you to shutup, and don't /msg me!
  324. n322=+8:on notice:*:#:/kick $chan $nick <=ACiD=> âShut-up Kickâ I thought I told you to shutup, that means /notices too!
  325. n323=#kickrevenge disabled
  326. n324=1:on kick:#: {
  327. n325=  if $knick == $me goto revenge
  328. n326=  goto done
  329. n327=  :revenge
  330. n328=  if $chan isin %kick.revenge.exempt { /timer213 1 5 /echo -a 14<=ACiD=> 14-12:4[7 $+ Revenge Kick $+ 4]12:14- 12Channel4 $chan 12is exempt from Revenge-Kicks | /goto done }
  331. n329=  wavplay c:\acid\sounds\alert.wav
  332. n330=  timer213 1 5 /kick $chan $nick <=ACiD=> Kick Revenge
  333. n331=  goto done
  334. n332=  :done
  335. n333=}
  336. n334=#kickrevenge end
  337. n335=1:ON BAN:#:{
  338. n336=  if $me !isop $chan { /halt }
  339. n337=  %i = 0
  340. n338=  %banchan = $chan
  341. n339=  if $nick == $me goto done 
  342. n340=  if $bnick == $me || $banmask iswm $address($me,0) || $banmask == *!*@* || $banmask == *@* { goto unban }
  343. n341=  else goto filter
  344. n342=  :filter
  345. n343=  inc %i 1
  346. n344=  if ($banmask iswm $address($nopnick(%i,%banchan),5)) { raw -q kick %banchan $nopnick(%i,%banchan) :<=ACiD=> You are banned: $banmask }
  347. n345=  if ($nopnick(%i,%banchan) == $null) { goto done }
  348. n346=  goto filter
  349. n347=  :unban
  350. n348=  mode $chan -bo $banmask $nick
  351. n349=  kick $chan $nick <=ACiD=> Invalid Ban - $banmask $+ 
  352. n350=  goto done
  353. n351=  :done
  354. n352=  unset %banchan
  355. n353=  unset %i
  356. n354=}
  357. n355=#repeatkick disabled
  358. n356=1:ON TEXT:*:#: {
  359. n357=  if $me isop $chan { /goto 1 }
  360. n358=  goto done
  361. n359=  :1
  362. n360=  set %a $nick $chan $parms
  363. n361=  if %a == %lastline { /goto 2 }
  364. n362=  set %lastline %a
  365. n363=  goto done
  366. n364=  :2
  367. n365=  if $chan isin %kick.revenge.exempt { /echo -a 14<=ACiD=> 14-12:4[7 $+ Repeat Kick $+ 4]12:14- 12Channel4 $chan 12is exempt from Repeat-Kicks | /halt }
  368. n366=  if $nick isop $chan { /notice $nick <=ACiD=> Shaddup With your damned repeating! | /halt }
  369. n367=  kick $chan $nick <=ACiD=> Don't Repeat, It's annoying as hell!
  370. n368=  unset %a
  371. n369=  goto done
  372. n370=  :done
  373. n371=}
  374. n372=1:ON ACTION:*:#: {
  375. n373=  if $me isop $chan { /goto 1 }
  376. n374=  goto done
  377. n375=  :1
  378. n376=  set %a $nick $chan $parms
  379. n377=  if %a == %lastline { /goto 2 }
  380. n378=  set %lastline %a
  381. n379=  goto done
  382. n380=  :2
  383. n381=  if $chan isin %kick.revenge.exempt { /echo -a 14<=ACiD=> 14-12:4[7 $+ Repeat Kick $+ 4]12:14- 12Channel4 $chan 12is exempt from Repeat-Kicks | /halt }
  384. n382=  if $nick isop $chan { /notice $nick <=ACiD=> Shaddup With your damned repeating! | /halt }
  385. n383=  kick $chan $nick <=ACiD=> Don't Repeat, It's annoying as hell!
  386. n384=  unset %a
  387. n385=  goto done
  388. n386=  :done
  389. n387=}
  390. n388=#repeatkick end
  391. n389=1:ON CHATOPEN:/splay c:\acid\sounds\chat.wav
  392. n390=1:ON JOIN:#: {
  393. n391=  if $me isop $chan {
  394. n392=if dcc isin $nick { /mode $chan +v $nick }
  395. n393=}
  396. n394=  if $nick != $me { halt }
  397. n395=  else { set %tmpchan $chan | /timer644 1 1 /stat }
  398. n396=}
  399.